home *** CD-ROM | disk | FTP | other *** search
/ Imekura ROM / Imekura ROM.iso / mac / Mac / ROOM7.DIR / 00015.ls < prev    next >
Encoding:
Text File  |  1995-07-17  |  218 b   |  13 lines
  1. on exitFrame
  2.   if playcheck(7) = 1 then
  3.     clearpuppet()
  4.     unLoadCast(the castNum of sprite 7)
  5.     go("NEXTC")
  6.   else
  7.     repeat with i = 3 to 7
  8.       cursorctl(i, "S")
  9.     end repeat
  10.     go(the frame)
  11.   end if
  12. end
  13.